﻿Public Class Previews

    Private Sub Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim x As Integer = 23
        Dim x2 As Integer = 680
        Dim y As Integer = 150

        If (RadioButton2.Checked) Then
            Main.GroupBox3.Hide()
            Main.InputGroup.Location = New Point(x, y)
            Main.CalculationGroup.Location = New Point(x2, y)
            Main.WindowState = FormWindowState.Normal
            Main.Height = 680
            Me.Close()

        ElseIf (RadioButton1.Checked) Then
            Main.GroupBox3.Show()
            Main.InputGroup.Location = New Point(23, 573)
            Main.CalculationGroup.Location = New Point(680, 573)
            Main.WindowState = FormWindowState.Maximized
            Main.Height = 673
            Me.Close()

        ElseIf (Not RadioButton1.Checked And Not RadioButton2.Checked) Then
            MessageBox.Show("Make sure you have selected an option.", "Notification", MessageBoxButtons.OK, MessageBoxIcon.Hand)
        End If
    End Sub

    Private Sub Close_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Close()
    End Sub
End Class